
## Exerccios de Funes Matemticas
### Ana Carolina Luchetta

###Biomassa de rvores



###Seqncias
rep ("a", 6)                  #repete a letra a 6 vezes
rep (1:3, each=3)             #repete cada nmero da seqncia 3 vezes
c(rep(1,3),rep(2,2),rep(3,1)) #concatena os resultados de repetio dos nmeros 1, 2 e 3
c ( 1:5, 4:1)                 #concatena a sequncia de 1 a 5, com a sequencia de 4 a 1
seq (1, 99, 2)                #seqncia de 1 a 99, com invremento 2

##Conta de luz
luz <- c (9839, 10149, 10486, 10746, 11264, 11684, 12082, 12599, 13004, 13350, 13717, 14052)
diferenca <- diff (luz)       #diferena entre o primeiro e o segundo valor, entre o segundo e o terceiro, ....
range (diferenca)             #maior e menor valor das diferenas
mean (diferenca)              #mdia dos valores
median (diferenca)            #mediana dos valores
var(diferenca)                #varincia dos valores
##ou##
summary (diferenca)           #todos os valores de uma vez s

##rea basal
diametro <- 13.5
raio <- diametro/2            #o raio ser metade do dimetro
area <- 2*pi*raio^2           #para calcular a rea de uma circunferncia, utiliza-se a frmula
area                          #verifica a rea (286.2776 cm)
areatotal <- (2*pi*(7/2)^2)+(2*pi*(9/2)^2)+(2*pi*(12/2)^2)     #soma de cada uma das reas
areatotal

##Varincia na unha
pesos <- c(78.4, 79.8, 76.0, 75.3, 77.4, 78.6, 77.9, 78.8, 79.2, 75.2, 75.0, 79.4)
desvio <- mean(pesos)-pesos
variancia <- sum(desvio^2)/(length (pesos) - 1)
variancia                     #varincia na unha
var (pesos)                   #varincia pela frmula (valores iguais de 3.110606)
sqrt (variancia)              #o desvio padro  a raiz quadrada da varincoa
sd (pesos)                    #desvio padro pela frmula (valores iguais de 1.763691)

##